home *** CD-ROM | disk | FTP | other *** search
- # TRUMPET WINSOCK LOGIN.CMD FOR SEANET
-
-
- $number = ""
- $login = ""
- $password = ""
-
- DISPLAY \n
- DISPLAY \n
- DISPLAY \n
- DISPLAY \n
- DISPLAY *****************************************************************\n
- DISPLAY Your modem is now dialing SeaNet...\n
- DISPLAY \n
- DISPLAY If you receive a busy signal Winsock Dialer will redial the phone \n
- DISPLAY every 30 seconds until a connection is made or until you press\n
- DISPLAY the Escape key (Esc).\n
- DISPLAY *****************************************************************\n
- DISPLAY \n
-
- OUTPUT ATX4V1QE1\13
- input 10 OK
-
- repeat
- display \n
- display \n
- OUTPUT ATDT$number\13
- display Please Wait...\n
- until [input 45 CONNECT]
-
- #WAIT 30 DCD
- SLEEP 3
-
- INPUT 30 login:
-
- OUTPUT $login\13
- INPUT 30 Password:
- OUTPUT $password\13
-
- if [input 15 PPP]
-
- DISPLAY \n
- DISPLAY \n
- DISPLAY \n
- DISPLAY ********************************************************************\n
- DISPLAY
- DISPLAY " Welcome to..."\n
- DISPLAY \n
- DISPLAY " S E A N E T"\n
- DISPLAY \n
- DISPLAY You may now MINIMIZE Trumpet Winsock and run your PPP applications. \n
- DISPLAY If you have any problems please call 206-343-7828\n
- DISPLAY ********************************************************************\n
- DISPLAY \n
- DISPLAY \n
- DISPLAY \n
-
- ONLINE
- else
-
- display \n
- display \n
- display *** ERROR: not to connect! ***
- end
-